home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 471
- Top = 389
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'DID Configuration Tool'
- ClientHeight = 350
- ClientWidth = 575
- ParentFont = True
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object TabControl: TPageControl
- Left = 8
- Top = 8
- Width = 561
- Height = 297
- ActivePage = Video
- TabOrder = 0
- OnChange = TabControlChange
- object Video: TTabSheet
- Caption = 'Video'
- object Device: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 105
- Caption = 'Device'
- TabOrder = 0
- object ListBox1: TListBox
- Left = 16
- Top = 24
- Width = 337
- Height = 65
- Hint = 'Select the device to be used.'
- ItemHeight = 13
- TabOrder = 0
- OnClick = ListBox1Click
- end
- end
- object Mode: TGroupBox
- Left = 392
- Top = 8
- Width = 153
- Height = 73
- Caption = 'Mode'
- TabOrder = 1
- object ComboBox1: TComboBox
- Left = 16
- Top = 24
- Width = 121
- Height = 21
- Hint = 'Select the preferred video mode.'
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = ComboBox1Change
- end
- object CheckBox3: TCheckBox
- Left = 16
- Top = 48
- Width = 97
- Height = 17
- Hint =
- 'Toggles windowed / fullscreen display. This option is not availa' +
- 'ble on all video hardware.'
- Caption = 'Windowed'
- TabOrder = 1
- Visible = False
- OnClick = CheckBox3Click
- end
- end
- object GroupBox2: TGroupBox
- Left = 392
- Top = 120
- Width = 153
- Height = 137
- Caption = 'Miscellaneous'
- TabOrder = 2
- Visible = False
- object CheckBox4: TCheckBox
- Left = 16
- Top = 80
- Width = 73
- Height = 17
- Hint = 'When running in 16bpp modes, dithering reduces colour banding.'
- Caption = 'Dither'
- State = cbChecked
- TabOrder = 0
- end
- object RadioGroup3: TRadioGroup
- Left = 16
- Top = 24
- Width = 121
- Height = 49
- Hint = 'Select the preferred type of fog.'
- Caption = 'Fog'
- ItemIndex = 1
- Items.Strings = (
- 'None'
- 'Vertex')
- TabOrder = 1
- end
- object vsync: TCheckBox
- Left = 16
- Top = 96
- Width = 89
- Height = 17
- Hint = 'Enables/disables waiting for v-sync.'
- Caption = 'V-sync'
- TabOrder = 2
- end
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 120
- Width = 369
- Height = 137
- Caption = 'Texture'
- TabOrder = 3
- Visible = False
- object RadioGroup1: TRadioGroup
- Left = 24
- Top = 24
- Width = 105
- Height = 97
- Hint =
- 'Selects default texture format. Some video cards perform better ' +
- 'with specific formats.'
- Caption = 'Default Format'
- ItemIndex = 0
- Items.Strings = (
- '4 bit palettised'
- '8 bit palettised'
- '16 bit RGB'
- '32 bit RGB')
- TabOrder = 0
- OnClick = RadioGroup1Click
- end
- object RadioGroup2: TRadioGroup
- Left = 144
- Top = 24
- Width = 105
- Height = 97
- Hint =
- 'Selects texture resolution. Lower resolution requires less video' +
- ' memory.'
- Caption = 'Resolution'
- ItemIndex = 0
- Items.Strings = (
- 'High'
- 'Medium')
- TabOrder = 1
- end
- object CheckBox1: TCheckBox
- Left = 264
- Top = 32
- Width = 89
- Height = 17
- Hint = 'Enables/disables blinear filtering (smoothing) or texturemaps.'
- Caption = 'Bilinear filter'
- State = cbChecked
- TabOrder = 2
- end
- object Mipmap: TCheckBox
- Left = 264
- Top = 48
- Width = 81
- Height = 17
- Hint = 'Enables/disables mipmapping.'
- Caption = 'Mip-map'
- TabOrder = 3
- OnClick = MipmapClick
- end
- object cboxDynamic: TCheckBox
- Left = 264
- Top = 64
- Width = 81
- Height = 17
- Hint = 'Enables/disables hardware rendering to texturemaps.'
- Caption = 'Dynamic'
- TabOrder = 4
- end
- object compress: TCheckBox
- Left = 264
- Top = 80
- Width = 81
- Height = 17
- Hint = 'Enables/disables use of compressed textures.'
- Caption = 'Compress'
- TabOrder = 5
- OnClick = compressClick
- end
- end
- object VideoAdvanced: TButton
- Left = 392
- Top = 88
- Width = 89
- Height = 25
- Hint = 'Displays advanced configuration settings'
- Caption = 'Advanced >>>'
- TabOrder = 4
- OnClick = VideoAdvancedClick
- end
- end
- object Audio: TTabSheet
- Caption = 'Audio'
- object AudioDeviceGroupBox: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 105
- Caption = 'Digital Audio Device'
- TabOrder = 0
- object AudioDeviceListBox: TListBox
- Left = 16
- Top = 24
- Width = 337
- Height = 65
- Hint = 'Select the audio device to be used.'
- ItemHeight = 13
- TabOrder = 0
- end
- end
- object GroupBox4: TGroupBox
- Left = 8
- Top = 120
- Width = 209
- Height = 137
- Caption = 'CD Volume Select'
- TabOrder = 1
- Visible = False
- object Label2: TLabel
- Left = 16
- Top = 24
- Width = 89
- Height = 13
- Caption = 'Mixer device name'
- end
- object Label3: TLabel
- Left = 16
- Top = 72
- Width = 87
- Height = 13
- Caption = 'Mixer device slider'
- end
- object MixerLines: TComboBox
- Left = 16
- Top = 40
- Width = 145
- Height = 21
- Hint = 'Select the mixer slider which controls CD audio'
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- end
- object TrackBar1: TTrackBar
- Left = 8
- Top = 88
- Width = 161
- Height = 33
- Hint = 'Moving this slider should change the CD volume'
- Max = 127
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 20
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TrackBar1Change
- end
- object Button4: TButton
- Left = 168
- Top = 40
- Width = 25
- Height = 25
- Hint = 'Launches Volume Control'
- Caption = '>>>'
- TabOrder = 2
- OnClick = Button4Click
- end
- end
- object AudioAdvanced: TButton
- Left = 392
- Top = 88
- Width = 89
- Height = 25
- Hint = 'Displays advanced configuration settings'
- Caption = 'Advanced >>>'
- TabOrder = 2
- OnClick = AudioAdvancedClick
- end
- end
- object Comms: TTabSheet
- Caption = 'Comms'
- TabVisible = False
- end
- object Input: TTabSheet
- Caption = 'Input'
- TabVisible = False
- end
- end
- object BottomBar: TPanel
- Left = 8
- Top = 304
- Width = 561
- Height = 41
- BevelOuter = bvNone
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 16
- Width = 55
- Height = 13
- Caption = 'Application:'
- end
- object ComboBox2: TComboBox
- Left = 72
- Top = 12
- Width = 217
- Height = 21
- Hint = 'Application to which the configuration applies.'
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = ComboBox2Change
- end
- object Button1: TButton
- Left = 320
- Top = 10
- Width = 73
- Height = 25
- Hint = 'Exit and save configuration.'
- Caption = 'OK'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 400
- Top = 10
- Width = 73
- Height = 25
- Hint = 'Exit and discard changes to configuration.'
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 480
- Top = 10
- Width = 73
- Height = 25
- Hint = 'Save changes to application configuration but do not exit.'
- Caption = 'Apply'
- TabOrder = 3
- OnClick = Button3Click
- end
- end
- end
-